home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / CDTools / S / ChangeBrowser.awebrx < prev    next >
Text File  |  2000-11-08  |  519b  |  23 lines
  1. /*
  2.     Loads the current display into a different browser
  3.     $VER: ChangeBrowser.awebrx 1.0 (27.8.99)
  4.     (c) Neil Bothwick, Wirenet
  5. */
  6.  
  7. options results
  8. parse arg args
  9. parse var args Browser ' ' URL
  10. CDName = left(URL, pos(':',URL))
  11.  
  12. WebSites = CDName'AACD/WebSites/'
  13.  
  14. select
  15.     when Browser = IB then address command 'Run >NIL: 'WebSites'IBrowse/IBrowse file://localhost/'URL 'CONFIGDIR 'WebSites'IBrowse'
  16.     when Browser = V then address command 'Run >NIL: 'WebSites'Voyager/V file:///'URL
  17.     otherwise nop
  18.     end
  19.  
  20. 'quit force'
  21. exit
  22.  
  23.